inherited FrmDependentes: TFrmDependentes
  Left = 286
  Top = 112
  Caption = 'Cadastro de Dependentes'
  ClientHeight = 508
  ClientWidth = 522
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 471
    Width = 522
  end
  inherited Panel2: TPanel
    Width = 522
    Height = 471
    inherited Panel3: TPanel
      Width = 520
      Caption = 'Cadastro de Dependentes'
      inherited GroupBox1: TGroupBox
        Left = 441
      end
    end
    inherited Panel4: TPanel
      Width = 520
      Height = 429
      object Label7: TLabel [0]
        Left = 271
        Top = 88
        Width = 95
        Height = 13
        Caption = 'Grau de Parentesco'
      end
      object Label6: TLabel [1]
        Left = 8
        Top = 88
        Width = 97
        Height = 13
        Caption = 'Data de Nascimento'
        FocusControl = EdtNascimento
      end
      object Label3: TLabel [2]
        Left = 72
        Top = 48
        Width = 28
        Height = 13
        Caption = 'Nome'
        FocusControl = EdtNome
      end
      object Label2: TLabel [3]
        Left = 8
        Top = 48
        Width = 59
        Height = 13
        Caption = 'Dependente'
        FocusControl = edtDependente
      end
      object Label1: TLabel [4]
        Left = 8
        Top = 9
        Width = 35
        Height = 13
        Caption = 'Pessoa'
      end
      inherited DBGrid1: TDBGrid
        Top = 176
        Width = 512
        Height = 231
      end
      inherited SbHints: TStatusBar
        Top = 407
        Width = 512
        Height = 18
      end
      object RdgEstadoCivil: TDBRadioGroup
        Left = 8
        Top = 128
        Width = 257
        Height = 41
        Caption = 'Estado Civil'
        Columns = 4
        DataField = 'DEP_ESTADOCIVIL'
        DataSource = DtSrc
        Items.Strings = (
          'Solteiro'
          'Casado'
          'Vi'#250'vo'
          'NI')
        TabOrder = 2
        Values.Strings = (
          'S'
          'C'
          'V'
          'N')
      end
      object RdgSexo: TDBRadioGroup
        Left = 272
        Top = 128
        Width = 241
        Height = 41
        Caption = 'Sexo'
        Columns = 2
        DataField = 'DEP_SEXO'
        DataSource = DtSrc
        Items.Strings = (
          'Masculino'
          'Feminino')
        TabOrder = 3
        Values.Strings = (
          'M'
          'F')
      end
      object EdtNascimento: TDBEdit
        Left = 7
        Top = 104
        Width = 258
        Height = 21
        DataField = 'DEP_DATANASCIMENTO'
        DataSource = DtSrc
        TabOrder = 4
      end
      object edtDependente: TDBEdit
        Left = 8
        Top = 64
        Width = 49
        Height = 21
        DataField = 'DEP_DEPENDENTEIDF'
        DataSource = DtSrc
        ReadOnly = True
        TabOrder = 5
      end
      object EdtNome: TDBEdit
        Left = 64
        Top = 64
        Width = 449
        Height = 21
        DataField = 'DEP_NOME'
        DataSource = DtSrc
        TabOrder = 6
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 272
        Top = 104
        Width = 241
        Height = 21
        DataField = 'PARENTESCO'
        DataSource = DtSrc
        TabOrder = 7
      end
      object stxtNome: TStaticText
        Left = 8
        Top = 24
        Width = 505
        Height = 21
        AutoSize = False
        BorderStyle = sbsSingle
        TabOrder = 8
      end
    end
  end
  inherited DtSrc: TDataSource
    DataSet = SQLC_Dependentes
    Left = 16
  end
  inherited DtSrcDBGrid: TDataSource
    Left = 80
  end
  object SQLC_Dependentes: TSQLClientDataSet
    CommandText = 
      'SELECT * '#13#10'FROM PESSOA_DEPENDENTES '#13#10'WHERE DEP_PESSOAIDF = :DEP_' +
      'PESSOAIDF'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftInteger
        Name = 'DEP_PESSOAIDF'
        ParamType = ptInput
      end>
    BeforeApplyUpdates = SQLC_DependentesBeforeApplyUpdates
    DBConnection = DtmGeral.ConexaoBanco
    Left = 377
    Top = 225
    object SQLC_DependentesDEP_PESSOAIDF: TIntegerField
      FieldName = 'DEP_PESSOAIDF'
      Required = True
    end
    object SQLC_DependentesDEP_DEPENDENTEIDF: TIntegerField
      FieldName = 'DEP_DEPENDENTEIDF'
      Required = True
    end
    object SQLC_DependentesDEP_NOME: TStringField
      FieldName = 'DEP_NOME'
      Required = True
      Size = 60
    end
    object SQLC_DependentesDEP_ESTADOCIVIL: TStringField
      FieldName = 'DEP_ESTADOCIVIL'
      Size = 1
    end
    object SQLC_DependentesDEP_DATANASCIMENTO: TDateField
      FieldName = 'DEP_DATANASCIMENTO'
    end
    object SQLC_DependentesDEP_GRAU: TIntegerField
      FieldName = 'DEP_GRAU'
      Required = True
    end
    object SQLC_DependentesDEP_SEXO: TStringField
      FieldName = 'DEP_SEXO'
      Required = True
      FixedChar = True
      Size = 1
    end
    object SQLC_DependentesPARENTESCO: TStringField
      FieldKind = fkLookup
      FieldName = 'PARENTESCO'
      LookupDataSet = SQLC_GRAU
      LookupKeyFields = 'PAR_CODIGO'
      LookupResultField = 'PAR_DESCRICAO'
      KeyFields = 'DEP_GRAU'
      Size = 40
      Lookup = True
    end
  end
  object SQLC_GRAU: TSQLClientDataSet
    CommandText = 'SELECT *'#13#10'FROM PESSOA_PARENTESCOS'#13#10'ORDER BY PAR_DESCRICAO'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 377
    Top = 273
  end
end
